object RaGE: TRaGE Left = 252 Top = 211 BorderIcons = [] BorderStyle = bsSingle Caption = 'RaGE - The Rapid Groove Editor' ClientHeight = 359 ClientWidth = 696 Color = 4470913 Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] Menu = MainMenu1 OldCreateOrder = True Position = poScreenCenter Scaled = False OnActivate = FormActivate OnHide = FormHide OnShow = FormShow PixelsPerInch = 96 TextHeight = 13 object Rage_Back: TImage Left = 0 Top = 0 Width = 513 Height = 360 AutoSize = True Picture.Data = {} end object Shape1: TShape Left = 105 Top = 17 Width = 399 Height = 135 Brush.Color = 10086557 Pen.Color = 10086557 end object s1: TLabel Left = 8 Top = 22 Width = 89 Height = 13 Alignment = taCenter AutoSize = False Caption = '...' Color = 10656960 Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'Arial' Font.Style = [] ParentColor = False ParentFont = False Transparent = True OnMouseDown = s1MouseDown end object s2: TLabel Left = 8 Top = 38 Width = 89 Height = 13 Alignment = taCenter AutoSize = False Caption = '...' Color = 10656960 Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'Arial' Font.Style = [] ParentColor = False ParentFont = False Transparent = True OnMouseDown = s1MouseDown end object s3: TLabel Left = 8 Top = 54 Width = 89 Height = 13 Alignment = taCenter AutoSize = False Caption = '...' Color = 10656960 Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'Arial' Font.Style = [] ParentColor = False ParentFont = False Transparent = True OnMouseDown = s1MouseDown end object s4: TLabel Left = 8 Top = 70 Width = 89 Height = 13 Alignment = taCenter AutoSize = False Caption = '...' Color = 10656960 Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'Arial' Font.Style = [] ParentColor = False ParentFont = False Transparent = True OnMouseDown = s1MouseDown end object s5: TLabel Left = 8 Top = 86 Width = 89 Height = 13 Alignment = taCenter AutoSize = False Caption = '...' Color = 10656960 Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'Arial' Font.Style = [] ParentColor = False ParentFont = False Transparent = True OnMouseDown = s1MouseDown end object s6: TLabel Left = 8 Top = 102 Width = 89 Height = 13 Alignment = taCenter AutoSize = False Caption = '...' Color = 10656960 Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'Arial' Font.Style = [] ParentColor = False ParentFont = False Transparent = True OnMouseDown = s1MouseDown end object s7: TLabel Left = 8 Top = 118 Width = 89 Height = 13 Alignment = taCenter AutoSize = False Caption = '...' Color = 10656960 Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'Arial' Font.Style = [] ParentColor = False ParentFont = False Transparent = True OnMouseDown = s1MouseDown end object s8: TLabel Left = 8 Top = 134 Width = 89 Height = 13 Alignment = taCenter AutoSize = False Caption = '...' Color = 10656960 Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'Arial' Font.Style = [] ParentColor = False ParentFont = False Transparent = True OnMouseDown = s1MouseDown end object Label1: TLabel Left = 528 Top = 280 Width = 153 Height = 73 AutoSize = False Caption = 'In this box you find all "patch" samples that are available in ' + 'this song. Files that are added to this list also appear in the ' + 'standard sample manager.' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'Arial' Font.Style = [] ParentFont = False WordWrap = True end object sl1: TImage Left = 152 Top = 280 Width = 9 Height = 14 AutoSize = True Picture.Data = {} OnMouseDown = sl1MouseDown OnMouseMove = sl1MouseMove OnMouseUp = distKnobMouseUp end object sl2: TImage Left = 182 Top = 280 Width = 9 Height = 14 AutoSize = True Picture.Data = {} OnMouseDown = sl1MouseDown OnMouseMove = sl1MouseMove OnMouseUp = distKnobMouseUp end object sl3: TImage Left = 212 Top = 280 Width = 9 Height = 14 AutoSize = True Picture.Data = {} OnMouseDown = sl1MouseDown OnMouseMove = sl1MouseMove OnMouseUp = distKnobMouseUp end object sl4: TImage Left = 242 Top = 280 Width = 9 Height = 14 AutoSize = True Picture.Data = {} OnMouseDown = sl1MouseDown OnMouseMove = sl1MouseMove OnMouseUp = distKnobMouseUp end object sl5: TImage Left = 272 Top = 280 Width = 9 Height = 14 AutoSize = True Picture.Data = {} OnMouseDown = sl1MouseDown OnMouseMove = sl1MouseMove OnMouseUp = distKnobMouseUp end object sl6: TImage Left = 302 Top = 280 Width = 9 Height = 14 AutoSize = True Picture.Data = {} OnMouseDown = sl1MouseDown OnMouseMove = sl1MouseMove OnMouseUp = distKnobMouseUp end object sl7: TImage Left = 332 Top = 280 Width = 9 Height = 14 AutoSize = True Picture.Data = {} OnMouseDown = sl1MouseDown OnMouseMove = sl1MouseMove OnMouseUp = distKnobMouseUp end object sl8: TImage Left = 362 Top = 280 Width = 9 Height = 14 AutoSize = True Picture.Data = {} OnMouseDown = sl1MouseDown OnMouseMove = sl1MouseMove OnMouseUp = distKnobMouseUp end object di1: TImage Left = 150 Top = 307 Width = 14 Height = 14 AutoSize = True OnMouseDown = di1MouseDown end object di2: TImage Left = 180 Top = 307 Width = 14 Height = 14 AutoSize = True OnMouseDown = di1MouseDown end object di3: TImage Left = 210 Top = 307 Width = 14 Height = 14 AutoSize = True OnMouseDown = di1MouseDown end object di4: TImage Left = 240 Top = 307 Width = 14 Height = 14 AutoSize = True OnMouseDown = di1MouseDown end object di5: TImage Left = 270 Top = 307 Width = 14 Height = 14 AutoSize = True OnMouseDown = di1MouseDown end object di6: TImage Left = 300 Top = 307 Width = 14 Height = 14 AutoSize = True OnMouseDown = di1MouseDown end object di7: TImage Left = 330 Top = 307 Width = 14 Height = 14 AutoSize = True OnMouseDown = di1MouseDown end object di8: TImage Left = 360 Top = 307 Width = 14 Height = 14 AutoSize = True OnMouseDown = di1MouseDown end object checkOn: TImage Left = 2000 Top = 211 Width = 14 Height = 14 AutoSize = True Picture.Data = {} end object checkOff: TImage Left = 2000 Top = 227 Width = 14 Height = 14 AutoSize = True Picture.Data = {} end object distKnob: TPaintBox Left = 24 Top = 294 Width = 41 Height = 41 OnMouseDown = distKnobMouseDown OnMouseMove = distKnobMouseMove OnMouseUp = distKnobMouseUp end object tempoKnob: TPaintBox Left = 66 Top = 171 Width = 19 Height = 19 OnMouseDown = tempoKnobMouseDown OnMouseMove = tempoKnobMouseMove end object shuffleKnob: TPaintBox Left = 66 Top = 217 Width = 19 Height = 19 OnMouseDown = shuffleKnobMouseDown OnMouseMove = shuffleKnobMouseMove end object playButton: TImage Left = 405 Top = 178 Width = 74 Height = 23 AutoSize = True Picture.Data = {} OnMouseDown = playButtonMouseDown OnMouseUp = playButtonMouseUp end object stopButton: TImage Left = 2405 Top = 178 Width = 74 Height = 23 AutoSize = True Picture.Data = {} OnMouseDown = stopButtonMouseDown OnMouseUp = stopButtonMouseUp end object renderButton: TImage Left = 206 Top = 329 Width = 111 Height = 23 AutoSize = True Picture.Data = {} OnMouseDown = renderButtonMouseDown OnMouseUp = renderButtonMouseUp end object amount_slider: TImage Left = 405 Top = 258 Width = 15 Height = 6 Picture.Data = {} Stretch = True OnMouseDown = amount_sliderMouseDown OnMouseMove = amount_sliderMouseMove OnMouseUp = steps_sliderMouseUp end object feedback_slider: TImage Left = 405 Top = 285 Width = 15 Height = 6 Picture.Data = {} Stretch = True OnMouseDown = amount_sliderMouseDown OnMouseMove = feedback_sliderMouseMove OnMouseUp = steps_sliderMouseUp end object steps_slider: TImage Left = 405 Top = 312 Width = 15 Height = 6 Picture.Data = {} Stretch = True OnMouseDown = amount_sliderMouseDown OnMouseMove = steps_sliderMouseMove OnMouseUp = steps_sliderMouseUp end object patchBox: TListBox Left = 528 Top = 16 Width = 153 Height = 193 Color = 10656960 Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'Arial' Font.Style = [] ItemHeight = 14 ParentFont = False TabOrder = 0 end object importBtn: TButton Left = 528 Top = 216 Width = 73 Height = 25 Caption = 'Import' TabOrder = 1 OnClick = importBtnClick end object ReplaceBtn: TButton Left = 608 Top = 216 Width = 73 Height = 25 Caption = 'Replace' TabOrder = 2 OnClick = ReplaceBtnClick end object deleteBtn: TButton Left = 608 Top = 248 Width = 73 Height = 25 Caption = 'Delete' TabOrder = 3 OnClick = deleteBtnClick end object tempoBox: TEdit Left = 22 Top = 172 Width = 37 Height = 17 BorderStyle = bsNone Color = 10656960 Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -15 Font.Name = 'Arial' Font.Style = [fsBold] MaxLength = 3 ParentFont = False TabOrder = 4 Text = '120' OnChange = tempoBoxChange end object shuffleBox: TEdit Left = 22 Top = 218 Width = 37 Height = 17 BorderStyle = bsNone Color = 10656960 Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -15 Font.Name = 'Arial' Font.Style = [fsBold] MaxLength = 2 ParentFont = False TabOrder = 5 Text = '0' OnChange = shuffleBoxChange end object grid_panel: TPanel Left = 111 Top = 22 Width = 385 Height = 127 Caption = 'grid_panel' TabOrder = 6 object Grid: TImage Left = 0 Top = 0 Width = 385 Height = 127 AutoSize = True Picture.Data = {} OnMouseDown = gridMouseDown end object velocity_panel: TPanel Left = 2000 Top = 48 Width = 82 Height = 37 BevelOuter = bvNone Caption = ' ' TabOrder = 0 object velocity_img: TImage Left = 0 Top = 0 Width = 82 Height = 37 AutoSize = True Picture.Data = {} OnMouseUp = velocity_sliderMouseUp end object velocity_slider: TImage Left = 5 Top = 9 Width = 15 Height = 6 AutoSize = True Picture.Data = {} OnMouseDown = velocity_sliderMouseDown OnMouseMove = velocity_sliderMouseMove OnMouseUp = velocity_sliderMouseUp end object pitch_slider: TImage Left = 5 Top = 22 Width = 15 Height = 6 AutoSize = True Picture.Data = {} OnMouseDown = velocity_sliderMouseDown OnMouseMove = pitch_sliderMouseMove OnMouseUp = velocity_sliderMouseUp end object pitch_btn: TImage Left = 67 Top = 20 Width = 10 Height = 10 AutoSize = True Picture.Data = {} OnMouseDown = pitch_btnMouseDown OnMouseUp = pitch_btnMouseUp end end end object toolTipLabel: TStaticText Left = 2000 Top = 240 Width = 41 Height = 17 Alignment = taCenter AutoSize = False BorderStyle = sbsSingle Caption = '0' Color = 9010881 Font.Charset = DEFAULT_CHARSET Font.Color = clWhite Font.Height = -12 Font.Name = 'Arial' Font.Style = [] ParentColor = False ParentFont = False TabOrder = 7 end object klavier: TPanel Left = 2000 Top = 248 Width = 82 Height = 30 BevelOuter = bvNone Caption = ' ' TabOrder = 8 object Image1: TImage Left = 0 Top = 0 Width = 82 Height = 30 AutoSize = True Picture.Data = {} end object klavierBox: TComboBox Left = 6 Top = 5 Width = 70 Height = 21 Color = 10656960 ItemHeight = 13 TabOrder = 0 Text = '- - -' OnChange = klavierBoxChange Items.Strings = ( '- - -' 'C 1' 'C# 1' 'D 1' 'D# 1' 'E 1' 'F 1' 'F# 1' 'G 1' 'G# 1' 'A 1' 'A# 1' 'B 1' 'C 2' 'C# 2' 'D 2' 'D# 2' 'E 2' 'F 2' 'F# 2' 'G 2' 'G# 2' 'A 2' 'A# 2' 'B 2' 'C 3' 'C# 3' 'D 3' 'D# 3' 'E 3' 'F 3' 'F# 3' 'G 3' 'G# 3' 'A 3' 'A# 3' 'B 3') end end object samplePop: TPopupMenu AutoPopup = False OnPopup = samplePopPopup Left = 464 Top = 112 end object MainMenu1: TMainMenu Left = 544 Top = 248 object File1: TMenuItem Caption = 'File' object RendertoWAV1: TMenuItem Caption = 'Render to WAV' OnClick = RendertoWAV1Click end object N1: TMenuItem Caption = '-' end object RenderGo1: TMenuItem Caption = 'Render && Go' OnClick = RenderGo1Click end object Cancel1: TMenuItem Caption = 'Cancel' OnClick = Cancel1Click end end end end